home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
ftp.mactech.com 2010
/
ftp.mactech.com.tar
/
ftp.mactech.com
/
thinkref
/
archive
/
THINKPascalUH2.1.sea
/
THINKPas Univ Hdr 2.1
/
Interfaces
/
GXMessages.p
< prev
next >
Wrap
Text File
|
1995-09-12
|
2KB
|
97 lines
{ Converted with MPW2TPas Tuesday, September 12, 1995 6:47:04 PM }
{
File: GXMessages.p
Contains: This file contains all of the public data structures,
Version: Technology: Quickdraw GX 1.1
Package: Universal Interfaces 2.1 in “MPW Latest” on ETO #18
Copyright: © 1984-1995 by Apple Computer, Inc.
All rights reserved.
Bugs?: If you find a problem with this file, use the Apple Bug Reporter
stack. Include the file and version information (from above)
in the problem description and send to:
Internet: apple.bugs@applelink.apple.com
AppleLink: APPLE.BUGS
}
UNIT GXMessages;
INTERFACE
{$IFC UNDEFINED __GXMESSAGES__}
{$SETC __GXMESSAGES__ := 1}
USES
ConditionalMacros, Types, MixedMode;
{ $PUSH}
{ $ALIGN MAC68K}
{ $LibExport+}
{
>>>>>> CONSTANTS <<<<<<
}
{ Message Manager Trap }
CONST
messageManagerTrap = $ABFB;
{ Message Manager Gestalt Selector }
gestaltMessageMgrVersion = 'mess';
{ Message Manager Error Result Codes }
messageStopLoopingErr = -5775;
cantDeleteRunningHandlerErr = -5776;
noMessageTableErr = -5777;
dupSignatureErr = -5778;
messageNotReceivedErr = -5799;
TYPE
MessageGlobalsInitProcPtr = ProcPtr; { PROCEDURE MessageGlobalsInit(messageGlobals: UNIV Ptr); }
MessageGlobalsInitUPP = UniversalProcPtr;
CONST
uppMessageGlobalsInitProcInfo = $000000C1; { PROCEDURE (4 byte param); }
FUNCTION NewMessageGlobalsInitProc(userRoutine: MessageGlobalsInitProcPtr): MessageGlobalsInitUPP;
{$IFC NOT GENERATINGCFM }
INLINE $2E9F;
{$ENDC}
PROCEDURE CallMessageGlobalsInitProc(messageGlobals: UNIV Ptr; userRoutine: MessageGlobalsInitUPP);
{$IFC NOT GENERATINGCFM}
INLINE $205F, $4E90;
{$ENDC}
TYPE
MessageGlobalsInitProc = MessageGlobalsInitUPP;
{
PUBLIC INTERFACES
Message Handler API Routines
}
{FUNCTION CountMessageHandlerInstances: LONGINT; C;}
{FUNCTION GetMessageHandlerClassContext: Ptr; C;}
{FUNCTION SetMessageHandlerClassContext(anyValue: UNIV Ptr): Ptr; C;}
{FUNCTION GetMessageHandlerInstanceContext: Ptr; C;}
{FUNCTION SetMessageHandlerInstanceContext(anyValue: UNIV Ptr): Ptr; C;}
{FUNCTION NewMessageGlobals(messageGlobalsSize: LONGINT; initProc: MessageGlobalsInitUPP): OSErr; C;}
{PROCEDURE DisposeMessageGlobals; C;}
{ $ALIGN RESET}
{ $POP}
{$ENDC} {__GXMESSAGES__}
IMPLEMENTATION
END.